10 IFW=2THENRUN30
20 W=2:POKE724,0:POKE725,0:POKE1022,0:POKE1023,0
30 POKE53280,0:POKE53281,0:PRINT"[154][147]";:(null):(null):POKE53269,0:POKE53265,11
40 POKE53282,3:POKE53283,14:POKE53272,27:POKE53270,216
50 GOSUB140
55 PRINT"[158]";PEEK(724)+256*PEEK(725)
60 PRINT"[159]***BLAST-OFF![159]***"
70 PRINT"PLUG JOYSTICK IN PORT 2."
80 (null) 2,203,2,17:(null) 8:(null)2,80,90:(null)2,1,1:(null)2:POKE53269,4
90 PRINT"PRESS FIRE TO START"
95 PRINT"[154]";:GOSUB130:PRINT"";SPC(35);"[168][169]";
97 SL=1520:GOSUB150:POKE53265,27:POKE716,3:POKE198,0
98 PRINT"[156]HIGH:";PEEK(1022)+256*PEEK(1023);
100 GETA$:IFA$<>""ANDLEN(AA$)<6THENAA$=AA$+A$:IFAA$="[137][134][135][136]"THEN270
105 IF(PEEK(56320)AND16)=16THEN100
110 (null)5:(null):(null):PRINT"[147]";
112 PRINT"3 - 2 - 1 - BLAST-OFF!":FORL=1TO500:NEXT
113 FORL=0TO34:GOSUB160:FORLL=1TO12:NEXT:GOSUB165:FORLL=1TO10:NEXT:NEXT:PRINT"[147]"
115 POKE724,.:POKE725,.:LV=1:PS=1000:PQ=2500:XS=2:GOTO300
120 SC=PEEK(724)+256*PEEK(725):PRINT"[158]";SC:PRINT"";
125 PRINT"[159]LIVES:";PEEK(716);"[157] ";
127 PRINT"LEVEL";LV:RETURN
130 PRINT"[194][195][196][197][157][157][157][157][198][199][200][201][157][157][157][157][202][203][204][205][157][157][157][157][206][207][208][209]";:RETURN
135 PRINT"[210][211][212][213][214][157][157][157][157][157][215][216][217][218][219][157][157][157][157][157][220][221][255][223][160][157][157][157][157][157][161][162][163][164][165]";:RETURN
140 FORL=0TO20:X=INT(RND(1)*999)+1024:XX=INT(RND(1)*5)
142 IFXX<2THENPOKEX,103:GOTO147
144 IFXX<4THENPOKEX,106:GOTO147
146 POKEX,65:POKEX+54272,14:GOTO148
147 POKEX+54272,9
148 NEXT:RETURN
150 S=54272:S%=40:FORL=0TO6:FORLL=0TO7:POKESL+S+L*S%+LL,14
155 POKESL+L*S%+LL,107+8*L+LL:NEXTLL,L:RETURN
160 PRINT"[150]#$[154]%'([146][157][157][157][157][157]";:RETURN
165 PRINT" [155]#$[154]%'([146][157][157][157][157][157]";:RETURN
170 PRINT"[154]+,-.[157][157][157][157]/012[157][157][157][157]3456[157][157][157][157]789:[146]";:RETURN
270 POKE716,200:GOTO110
280 FORL=0TO9:POKE828+L,PEEK(1639+L):POKE838+L,PEEK(55911+L):NEXT:RETURN
290 FORL=0TO9:POKE1639+L,PEEK(828+L):POKE55911+L,PEEK(838+L):NEXT:RETURN
300 PRINT"[147]";:POKE53265,11
305 ONLVGOTO310,320,330,337,340,345,350,355,360,365,330,370
310 GOSUB140:PRINT"[154]";:GOSUB135:PRINT"[145][145][166]";
315 GOTO400
320 GOSUB140:PRINT"[154]";SPC(32);:GOSUB130:PRINT"";:GOSUB130
325 PRINT"[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][166][145][145][145][168][169]";:GOTO400
330 GOSUB140:PRINT"[154]";SPC(30);:GOSUB135:PRINT"";
333 GOSUB130:PRINT"[145][166][145][166][168][169][157][157][157][157][157][157][157][157][157][168][169][145][166]";
335 PRINT"";:GOSUB170:GOTO400
337 GOSUB140:PRINT"[154])*[146]";:GOSUB135:SL=1451:GOSUB150
338 GOTO400
340 GOSUB140:PRINT"[154][157][157][157][157][157][157][157][157][157][157]";:GOSUB135:PRINT"[145][145]";
342 GOSUB130:SL=1448:GOSUB150:PRINT"[157][157][157][157][157][157][157][157][157][157][157][157][157]";:GOSUB170:GOTO400
345 GOSUB140:PRINT"[154])*[146][145][145][145][145][145][145][157]";:GOSUB135:PRINT"[168][169]";
347 PRINT"[157][157][157][157]";:GOSUB130:PRINT"[157])*[146][157][145][145][145][145][145][145]";:SL=1251:GOSUB170
348 GOSUB150:GOTO400
350 GOSUB140:SL=1439:GOSUB150:PRINT"[154][157][157][157][157][157][157][157][157]";:GOSUB170
352 PRINT"[168][169][166][145][166][157][157][157][157][157][157][157])*":GOTO400
355 GOSUB140:PRINT"[154]";:GOSUB170:PRINT"[145][145][145][145]";:GOSUB135:PRINT"[145][166]";
357 PRINT"";:GOSUB170:PRINT"[157][157][157][157][157][157][157][157][157][157][157][157][157]";:GOSUB130:GOTO400
360 GOSUB140:SL=1425:GOSUB150:PRINT"[154]";:GOSUB135
362 PRINT"[145][145][145][145]";:GOSUB130:PRINT"[145][145][145][168][169][145])*[146][145][166][145][193][151][167][154][170]";:GOTO400
365 GOSUB140:PRINT"[154])*[146][168][169][145][166][167][157][157][157][157]";:GOSUB130
367 PRINT"[145][145]";:GOSUB170:PRINT"[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]";:GOSUB130:GOTO400
370 GOSUB140:SL=1064:GOSUB150:SL=1335:GOSUB150:PRINT"[154]";
375 GOSUB135:PRINT"[145]";:GOSUB170:PRINT"[145][145][145][145]";:GOSUB130
380 PRINT"[157][157][157][157][157][157][145][145][145][145][145][145][145]";:GOSUB130
385 PRINT"[166][157])*[146][145][168][169]";
400 POKE53265,27:GOSUB120:GOSUB280:PRINT"";
402 PRINT"LEVEL";LV;"[157]!";
405 FORL=1TO2000:NEXT:GOSUB290:FORL=2TO7:(null)L:NEXT
410 (null)
420 GOSUB120
430 IFPEEK(716)=0THEN1000
440 IFSC>PSTHEN900
450 GOTO420
460 FORL=1TO20:GOSUB120:NEXT:POKE719,XS:RS=XS:IFPEEK(716)=0THEN1000
465 (null)
470 IFPEEK(719)=0THEN1500
475 (null)3:FORL=1TO110:(null)2:(null)4:(null)5:(null)6:NEXT:GOTO1400
477 LL=PEEK(716)
480 GOSUB120:IFPEEK(716)<LLTHEN910
482 IFPEEK(716)=0THEN1000
485 (null)2:(null)4:(null)5:(null)6
490 IFPEEK(719)<RSTHEN905
500 GOTO480
900 (null)(null):FORL=2TO7:(null)L:NEXT:GOTO460
905 (null)7:RS=RS-1:GOTO470
910 LL=LL-1:(null)0:IFPEEK(716)=0THEN1000
915 GOTO470
1000 (null):(null):PRINT"GAME OVER!":GOSUB120
1010 FORL=1TO5000:NEXT
1020 IFSC>PEEK(1022)+256*PEEK(1023)THENPOKE1022,PEEK(724):POKE1023,PEEK(725)
1030 RUN30
1400 (null)3,1,1:LL=PEEK(719)
1410 IFLL=1ORLL=5ORLL=9THEN:(null)3,203,2,17
1420 IFLL=2ORLL=6ORLL=10THEN:(null)3,200,0,0
1430 IFLL=3ORLL=7ORLL=11THEN:(null)3,201,0,0
1440 IFLL=4ORLL=8ORLL=12THEN:(null)3,197,0,0
1490 GOTO477
1500 (null)(null):FORL=1TO1500:NEXT:FORL=2TO7:(null)L:NEXT
1505 FORL=1TO500:NEXT:IFPEEK(716)=0THEN1000
1510 LV=LV+1:PS=PS+PQ:XS=XS+1:IFLV=13THEN2000
1515 IFLV=7THEN1530
1520 GOTO300
1530 PRINT"[147]";:GOSUB120:PRINT"";
1540 FORL=0TO34:GOSUB160:FORLL=1TO12:NEXT:GOSUB165:FORLL=1TO10:NEXT:NEXT
1545 PRINT"     ";:POKE716,PEEK(716)+1:GOSUB120:PRINT"";SPC(14);
1550 (null)7:FORT=1TO5:PRINT"EXTRA LIFE![157][157][157][157][157][157][157][157][157][157][157]";:FORL=1TO300:NEXT
1560 PRINT"           [157][157][157][157][157][157][157][157][157][157][157]";:FORL=1TO100:NEXTL,T
1570 GOTO300
2000 POKE53265,11:LV=12
2005 (null):(null):PRINT"[147][154]";:GOSUB140:PRINT"[168][169])*[146][157][157][157][157][157][157][166]";
2007 GOSUB120:SL=1214:GOSUB150
2010 PRINT"CONGRATULATIONS!"
2020 PRINT"YOU HAVE SUCCESSFULLY FOUGHT OFF ALL THE";
2030 PRINT"ENEMY ATTACK FIGHTERS AND SAVED THE     GALAXY!":POKE53265,27
2040 FORL=1TO4000:NEXT:GOTO1000